-- Paquete_Declaraciones
PACKAGE Paquete_Declaraciones IS
   TYPE Dia = ARRAY (1..31) OF Integer;
END Paquete_Declaraciones;


PACKAGE BODY Paquete_Declaraciones IS
   Numero    : Integer;
   Es_Valido : Booolean;
   DNI       : String (1 .. 9);
   Lunes_1   : Dia;

BEGIN
   Numero    := 1;
   Es_Valido := True;
   DNI       := "12345678A";
   Lunes_1   := 1;
   Put ("Se termino el programa");
END Paquete_Declaraciones;


